home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 1.iso / ARGONET / PD / PROGRAMMING / DESKLIBC / SOURCES.ZIP / DeskLib / !DLSources / Libraries / MsgTrans / s / OpenFile < prev   
Text File  |  1994-11-19  |  666b  |  51 lines

  1. a1 RN 0
  2. a2 RN 1
  3. a3 RN 2
  4. a4 RN 3
  5. v1 RN 4
  6. v2 RN 5
  7. v3 RN 6
  8. v4 RN 7
  9. v5 RN 8
  10. v6 RN 9
  11. sl RN 10
  12. fp RN 11
  13. ip RN 12
  14. sp RN 13
  15. lr RN 14
  16. pc RN 15
  17.  
  18. f0 FN 0
  19. f1 FN 1
  20. f2 FN 2
  21. f3 FN 3
  22. f4 FN 4
  23. f5 FN 5
  24. f6 FN 6
  25. f7 FN 7
  26.  
  27.  
  28. XOS_Bit                         EQU &020000
  29.  
  30. SWI_MessageTrans_FileInfo       EQU &041500
  31. SWI_MessageTrans_OpenFile       EQU &041501
  32. SWI_MessageTrans_Lookup         EQU &041502
  33. SWI_MessageTrans_CloseFile      EQU &041504
  34.  
  35.         AREA |D$$code|, CODE, READONLY
  36.  
  37.         EXPORT MessageTrans_OpenFile
  38.  
  39. MessageTrans_OpenFile
  40.  
  41.         STMFD   sp!,{lr}
  42.  
  43.         SWI     SWI_MessageTrans_OpenFile + XOS_Bit
  44.  
  45.         MOVVC   a1,#0
  46.         LDMFD   sp!,{pc}^
  47.  
  48.         END
  49.  
  50.  
  51.